home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / exitwi / aboutbox.frm next >
Text File  |  1995-12-05  |  5KB  |  155 lines
  1. VERSION 2.00
  2. Begin Form AboutBox 
  3.    BackColor       =   &H00C0C0C0&
  4.    BorderStyle     =   3  'Fixed Double
  5.    Caption         =   "About ExitWin"
  6.    ClientHeight    =   2445
  7.    ClientLeft      =   2385
  8.    ClientTop       =   4185
  9.    ClientWidth     =   5610
  10.    ClipControls    =   0   'False
  11.    FontBold        =   -1  'True
  12.    FontItalic      =   0   'False
  13.    FontName        =   "System"
  14.    FontSize        =   9.75
  15.    FontStrikethru  =   0   'False
  16.    FontUnderline   =   0   'False
  17.    Height          =   2850
  18.    Icon            =   0
  19.    Left            =   2325
  20.    LinkMode        =   1  'Source
  21.    LinkTopic       =   "Form2"
  22.    MaxButton       =   0   'False
  23.    MinButton       =   0   'False
  24.    ScaleHeight     =   2445
  25.    ScaleWidth      =   5610
  26.    Top             =   3840
  27.    Width           =   5730
  28.    Begin PictureBox Pic_ApplicationIcon 
  29.       AutoSize        =   -1  'True
  30.       BackColor       =   &H00C0C0C0&
  31.       BorderStyle     =   0  'None
  32.       Height          =   480
  33.       Left            =   255
  34.       Picture         =   ABOUTBOX.FRX:0000
  35.       ScaleHeight     =   480
  36.       ScaleWidth      =   480
  37.       TabIndex        =   2
  38.       Top             =   480
  39.       Width           =   480
  40.    End
  41.    Begin CommandButton Cmd_OK 
  42.       Caption         =   "OK"
  43.       FontBold        =   -1  'True
  44.       FontItalic      =   0   'False
  45.       FontName        =   "System"
  46.       FontSize        =   9.75
  47.       FontStrikethru  =   0   'False
  48.       FontUnderline   =   0   'False
  49.       Height          =   360
  50.       Left            =   2160
  51.       TabIndex        =   3
  52.       Top             =   1920
  53.       Width           =   1035
  54.    End
  55.    Begin Label Label5 
  56.       BackColor       =   &H00C0C0C0&
  57.       Caption         =   "Modified"
  58.       ForeColor       =   &H000000FF&
  59.       Height          =   255
  60.       Left            =   1320
  61.       TabIndex        =   8
  62.       Top             =   840
  63.       Width           =   855
  64.    End
  65.    Begin Label Label4 
  66.       BackColor       =   &H00C0C0C0&
  67.       Caption         =   "B = Reboot Computor"
  68.       Height          =   255
  69.       Left            =   2760
  70.       TabIndex        =   7
  71.       Top             =   960
  72.       Width           =   2655
  73.    End
  74.    Begin Label Label3 
  75.       BackColor       =   &H00C0C0C0&
  76.       Caption         =   "R = Restart Windows"
  77.       Height          =   375
  78.       Left            =   2760
  79.       TabIndex        =   6
  80.       Top             =   720
  81.       Width           =   2655
  82.    End
  83.    Begin Label Label2 
  84.       BackColor       =   &H00C0C0C0&
  85.       Caption         =   "X = End Windows Session"
  86.       Height          =   255
  87.       Left            =   2760
  88.       TabIndex        =   5
  89.       Top             =   480
  90.       Width           =   2655
  91.    End
  92.    Begin Label Label1 
  93.       BackColor       =   &H00C0C0C0&
  94.       Caption         =   "Command Line Switches"
  95.       ForeColor       =   &H00FF0000&
  96.       Height          =   255
  97.       Left            =   2760
  98.       TabIndex        =   4
  99.       Top             =   240
  100.       Width           =   2535
  101.    End
  102.    Begin Line lin_HorizontalLine1 
  103.       BorderWidth     =   2
  104.       X1              =   120
  105.       X2              =   4995
  106.       Y1              =   1320
  107.       Y2              =   1320
  108.    End
  109.    Begin Label Lbl_IconWorks 
  110.       BackColor       =   &H00C0C0C0&
  111.       Caption         =   "ExitWin"
  112.       FontBold        =   -1  'True
  113.       FontItalic      =   0   'False
  114.       FontName        =   "MS Sans Serif"
  115.       FontSize        =   18
  116.       FontStrikethru  =   0   'False
  117.       FontUnderline   =   0   'False
  118.       Height          =   450
  119.       Left            =   1080
  120.       TabIndex        =   0
  121.       Top             =   360
  122.       Width           =   1455
  123.    End
  124.    Begin Label Lbl_Version 
  125.       BackColor       =   &H00C0C0C0&
  126.       Caption         =   "Version 1.00        Freeware"
  127.       FontBold        =   -1  'True
  128.       FontItalic      =   0   'False
  129.       FontName        =   "MS Sans Serif"
  130.       FontSize        =   9.75
  131.       FontStrikethru  =   0   'False
  132.       FontUnderline   =   0   'False
  133.       Height          =   240
  134.       Left            =   1200
  135.       TabIndex        =   1
  136.       Top             =   1440
  137.       Width           =   3990
  138.    End
  139. End
  140. DefInt A-Z
  141. Declare Function GetFreeSpace Lib "Kernel" (ByVal wFlags) As Long
  142. Declare Function GetWinFlags Lib "Kernel" () As Long
  143. Const WF_STANDARD = &H10
  144. Const WF_ENHANCED = &H20
  145. Const WF_80x87 = &H400
  146.  
  147. Sub Cmd_OK_Click ()
  148.     Unload AboutBox
  149. End Sub
  150.  
  151. Sub Form_Load ()
  152.     Show
  153. End Sub
  154.  
  155.